home *** CD-ROM | disk | FTP | other *** search
/ Aminet 33 / Aminet 33 - October 1999.iso / Aminet / dev / misc / ADV141.lha / AutodocViewer141 / Install < prev    next >
Encoding:
Text File  |  1999-07-08  |  3.3 KB  |  197 lines
  1. ; $Id: AutodocViewer_Installer v1.41 (7 July 1999)
  2. ; $VER: AutodocViewer_Installer v1.41 Copyright © 1994-1999 Ronny Tennebekk (7 July 1999)
  3.  
  4. (set @default-dest "SYS:")
  5. (set programme "AutodocViewer")
  6. (set progver "1.41")
  7. ;(set docs-dir 0)
  8.  
  9. ;------------------------------------------------------------
  10. ; English strings
  11. ;------------------------------------------------------------
  12.  
  13. (set #install-msg
  14.     (cat "\n\n"programme " v" progver " (7.07.99)\n"
  15.          "Copyright © 1994-1999 Ronny Tennebekk\n\n\n"
  16.          "\nThis install script will install\n"
  17.          "AutodocViewer on your harddisk...\n"
  18.     )
  19. )
  20.  
  21. (set #install-prefs
  22.     (cat "\n\nDo you want to copy the example prefs file?\n"
  23.          "Note that  exsisting prefs files will be\n"
  24.          "overwritten!\n"
  25.     )
  26. )
  27.  
  28. (set #bad-kick
  29.     (cat "\n\nYou must have Kickstart 3.0 or higher installed to use " programme "!"
  30.     )
  31. )
  32.  
  33. (set #app-where
  34.     (cat "Where do you what "programme" to be installed?\n"
  35.          "No directory will be created!\n"
  36.     )
  37. )
  38.  
  39. (set #copying
  40.     (cat "Copying " programme
  41.     )
  42. )
  43.  
  44. (set #install-quest
  45.     (cat "\n\nDo you want to install the documentation???\n"
  46.     )
  47. )
  48.  
  49. (set #install-appicon
  50.     (cat "\n\nDo you want to install AutodocViewer Appicon?\n\n"
  51.          "If you select no, AutodocViewer will use the\n"
  52.          "built-in appicon, which can be `ugly` depending\n"
  53.          "on your workbench screen."
  54.     )
  55. )
  56.  
  57.  
  58. ;============================================================
  59. ; make sure we are running under a 3.0 ROM
  60.  
  61.  
  62. (if (< (/ (getversion) 65536) 39)
  63.     (
  64.         (abort #bad-kick)
  65.     )
  66. )
  67.  
  68.  
  69. ;============================================================
  70. ;
  71.  
  72. (complete 0)
  73.  
  74. (message #install-msg)
  75.  
  76. (welcome)
  77.  
  78. (set app-dir
  79.     (askdir
  80.         (prompt #app-where)
  81.         (help @askdir-help)
  82.         (default @default-dest)
  83.     )
  84. )
  85.  
  86. (complete 10)
  87.  
  88. (
  89.  
  90.     (copyfiles
  91.         (prompt "\n" #copying)
  92.         (source "tools/AutodocViewer")
  93.         (dest app-dir)
  94.     )
  95.  
  96.     (complete 20)
  97.  
  98.      (copyfiles
  99.         (source "tools/AutodocViewer.info")
  100.         (dest app-dir)
  101.     )
  102. )
  103.  
  104. (complete 30)
  105.  
  106. ;============================================================
  107. ; install docs
  108.  
  109. (if
  110.    (askbool
  111.       (prompt (#install-quest))
  112.       (help @askdir-help)
  113.    )
  114.  
  115.    (
  116.       (copyfiles
  117.          (source ("docs/AutodocViewer.guide"))
  118.          (dest app-dir)
  119.       )
  120.    )
  121.  
  122.    (complete 40)
  123.  
  124.    (
  125.       (copyfiles
  126.          (source ("docs/AutodocViewer.guide.info"))
  127.          (dest app-dir)
  128.       )
  129.    )
  130.  
  131.    (complete 50)
  132.  
  133.    (
  134.       (copyfiles
  135.          (source ("docs/ScreenShot.iff"))
  136.          (dest app-dir)
  137.       )
  138.    )
  139.  
  140. )
  141.  
  142.  
  143. ;============================================================
  144. ; ask if user want's install appicon
  145.  
  146. (complete 60)
  147.  
  148. (if
  149.    (askbool
  150.       (prompt (#install-appicon))
  151.       (help @askbool-help)
  152.    )
  153.  
  154.    (
  155.       (copyfiles
  156.          (source ("icons/AppIcon_AutodocViewer.info"))
  157.          (dest app-dir)
  158.       )
  159.  
  160.    )
  161.  
  162.    (complete 70)
  163.  
  164. )
  165.  
  166.  
  167. ;============================================================
  168. ; ask if user want's copy existing prefs installed
  169.  
  170. (complete 80)
  171.  
  172. (if
  173.    (askbool
  174.       (prompt (#install-prefs))
  175.       (help @askbool-help)
  176.    )
  177.  
  178.    (
  179.       (copyfiles
  180.          (source ("tools/AutodocViewer.prefs"))
  181.          (dest app-dir)
  182.       )
  183.  
  184.    )
  185.  
  186.    (complete 90)
  187.  
  188. )
  189.  
  190.  
  191. ;============================================================
  192. ; Installisation complete
  193.  
  194. (set @default-dest app-dir)
  195. (complete 100)
  196. (exit)
  197.